Framework EDI Reference. Methods and Properties
ediTransport. IsConnected

Indicates if there is an existing connection with the remote server.

Syntax:

• <True/False> = ediTransport.IsConnected

Remarks:

A connection with the remote server may persist after a remote operation.  This behaviour may by modified using the ediTransport.EnablePersistentConnection property.

To disconnect an existing connection use the ediTransport.Disconnect method.

 

Example

Dim oEdiDoc As Fredi.ediDocument
Dim oTransports As Fredi.ediTransports
Dim oTransport As Fredi.ediTransport

' Create instance of Framework EDI.
Set oEdiDoc = New Fredi.ediDocument

' Get transports object
Set oTransports = oEdiDoc.GetTransports

' Create single transport object for sending document.
Set oTransport = oTransports.CreateTransport

' Set required parameters for the upload.
oTransport.SetHTTP
oTransport.User = "UserID"
oTransport.Password = "password"
oTransport.Address = "www.somesite.com"
oTransport.TargetPath = "/FREDI_TEST/TestFiles/"

' Not yet connected.
Debug.Assert oTransport.IsConnected = False

' Send external file. Connection with remote server is made.
oTransport.SendFile App.Path & "\SendTest.Txt"

' Still connected.
Debug.Assert oTransport.IsConnected = True

MsgBox "File sent"